perm filename TTLAP.MIC[VLI,LSP] blob sn#382082 filedate 1978-09-08 generic text, type T, neo UTF8
.R VLISP
* (LAP '((ENTRY CADDDDR SUBR 1)
*        (SKIPA A1 :MEM A1)
*        (ENTRY CDDDDDR SUBR 1)
*        (HLRZ  A1 :MEM A1)
*        (JRST  0 CADDDR))
*      T)